home *** CD-ROM | disk | FTP | other *** search
/ The 640 MEG Shareware Studio 2 / The 640 Meg Shareware Studio CD-ROM Volume II (Data Express)(1993).ISO / dbase / do1beta.zip / ARRAY.DO < prev    next >
Text File  |  1991-07-29  |  199b  |  10 lines
  1. /*
  2.     this is a test of dObject's Array class
  3. */
  4. a = new(Array,[3,3,3]);
  5. ? "size of array is ",len(a);
  6. ? "dimensions of array are ",dim(a);
  7. replace(a,[0,0,0],1);
  8. ? at(a,[0,0,0]);
  9. release(#a);
  10.